\(\int \frac {\csc ^2(a+b x)}{\sin ^{\frac {9}{2}}(2 a+2 b x)} \, dx\) [114]

Optimal result

Integrand size = 22, antiderivative size = 106 \[ \int \frac {\csc ^2(a+b x)}{\sin ^{\frac {9}{2}}(2 a+2 b x)} \, dx=\frac {30 \operatorname {EllipticF}\left (a-\frac {\pi }{4}+b x,2\right )}{77 b}-\frac {18 \cos (2 a+2 b x)}{77 b \sin ^{\frac {7}{2}}(2 a+2 b x)}-\frac {\csc ^2(a+b x)}{11 b \sin ^{\frac {7}{2}}(2 a+2 b x)}-\frac {30 \cos (2 a+2 b x)}{77 b \sin ^{\frac {3}{2}}(2 a+2 b x)} \]

[Out]

-30/77*(sin(a+1/4*Pi+b*x)^2)^(1/2)/sin(a+1/4*Pi+b*x)*EllipticF(cos(a+1/4*Pi+b*x),2^(1/2))/b-18/77*cos(2*b*x+2*
a)/b/sin(2*b*x+2*a)^(7/2)-1/11*csc(b*x+a)^2/b/sin(2*b*x+2*a)^(7/2)-30/77*cos(2*b*x+2*a)/b/sin(2*b*x+2*a)^(3/2)

Rubi [A] (verified)

Time = 0.08 (sec) , antiderivative size = 106, normalized size of antiderivative = 1.00, number of steps used = 4, number of rules used = 3, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.136, Rules used = {4385, 2716, 2720} \[ \int \frac {\csc ^2(a+b x)}{\sin ^{\frac {9}{2}}(2 a+2 b x)} \, dx=\frac {30 \operatorname {EllipticF}\left (a+b x-\frac {\pi }{4},2\right )}{77 b}-\frac {30 \cos (2 a+2 b x)}{77 b \sin ^{\frac {3}{2}}(2 a+2 b x)}-\frac {18 \cos (2 a+2 b x)}{77 b \sin ^{\frac {7}{2}}(2 a+2 b x)}-\frac {\csc ^2(a+b x)}{11 b \sin ^{\frac {7}{2}}(2 a+2 b x)} \]

[In]

Int[Csc[a + b*x]^2/Sin[2*a + 2*b*x]^(9/2),x]

[Out]

(30*EllipticF[a - Pi/4 + b*x, 2])/(77*b) - (18*Cos[2*a + 2*b*x])/(77*b*Sin[2*a + 2*b*x]^(7/2)) - Csc[a + b*x]^
2/(11*b*Sin[2*a + 2*b*x]^(7/2)) - (30*Cos[2*a + 2*b*x])/(77*b*Sin[2*a + 2*b*x]^(3/2))

Rule 2716

Int[((b_.)*sin[(c_.) + (d_.)*(x_)])^(n_), x_Symbol] :> Simp[Cos[c + d*x]*((b*Sin[c + d*x])^(n + 1)/(b*d*(n + 1
))), x] + Dist[(n + 2)/(b^2*(n + 1)), Int[(b*Sin[c + d*x])^(n + 2), x], x] /; FreeQ[{b, c, d}, x] && LtQ[n, -1
] && IntegerQ[2*n]

Rule 2720

Int[1/Sqrt[sin[(c_.) + (d_.)*(x_)]], x_Symbol] :> Simp[(2/d)*EllipticF[(1/2)*(c - Pi/2 + d*x), 2], x] /; FreeQ
[{c, d}, x]

Rule 4385

Int[((e_.)*sin[(a_.) + (b_.)*(x_)])^(m_)*((g_.)*sin[(c_.) + (d_.)*(x_)])^(p_), x_Symbol] :> Simp[(e*Sin[a + b*
x])^m*((g*Sin[c + d*x])^(p + 1)/(2*b*g*(m + p + 1))), x] + Dist[(m + 2*p + 2)/(e^2*(m + p + 1)), Int[(e*Sin[a
+ b*x])^(m + 2)*(g*Sin[c + d*x])^p, x], x] /; FreeQ[{a, b, c, d, e, g, p}, x] && EqQ[b*c - a*d, 0] && EqQ[d/b,
2] &&  !IntegerQ[p] && LtQ[m, -1] && NeQ[m + 2*p + 2, 0] && NeQ[m + p + 1, 0] && IntegersQ[2*m, 2*p]

Rubi steps \begin{align*} \text {integral}& = -\frac {\csc ^2(a+b x)}{11 b \sin ^{\frac {7}{2}}(2 a+2 b x)}+\frac {18}{11} \int \frac {1}{\sin ^{\frac {9}{2}}(2 a+2 b x)} \, dx \\ & = -\frac {18 \cos (2 a+2 b x)}{77 b \sin ^{\frac {7}{2}}(2 a+2 b x)}-\frac {\csc ^2(a+b x)}{11 b \sin ^{\frac {7}{2}}(2 a+2 b x)}+\frac {90}{77} \int \frac {1}{\sin ^{\frac {5}{2}}(2 a+2 b x)} \, dx \\ & = -\frac {18 \cos (2 a+2 b x)}{77 b \sin ^{\frac {7}{2}}(2 a+2 b x)}-\frac {\csc ^2(a+b x)}{11 b \sin ^{\frac {7}{2}}(2 a+2 b x)}-\frac {30 \cos (2 a+2 b x)}{77 b \sin ^{\frac {3}{2}}(2 a+2 b x)}+\frac {30}{77} \int \frac {1}{\sqrt {\sin (2 a+2 b x)}} \, dx \\ & = \frac {30 \operatorname {EllipticF}\left (a-\frac {\pi }{4}+b x,2\right )}{77 b}-\frac {18 \cos (2 a+2 b x)}{77 b \sin ^{\frac {7}{2}}(2 a+2 b x)}-\frac {\csc ^2(a+b x)}{11 b \sin ^{\frac {7}{2}}(2 a+2 b x)}-\frac {30 \cos (2 a+2 b x)}{77 b \sin ^{\frac {3}{2}}(2 a+2 b x)} \\ \end{align*}

Mathematica [A] (verified)

Time = 0.84 (sec) , antiderivative size = 86, normalized size of antiderivative = 0.81 \[ \int \frac {\csc ^2(a+b x)}{\sin ^{\frac {9}{2}}(2 a+2 b x)} \, dx=\frac {480 \operatorname {EllipticF}\left (a-\frac {\pi }{4}+b x,2\right )+\left (-141 \csc ^2(a+b x)-32 \csc ^4(a+b x)-7 \csc ^6(a+b x)+11 \sec ^2(a+b x) \left (9+\sec ^2(a+b x)\right )\right ) \sqrt {\sin (2 (a+b x))}}{1232 b} \]

[In]

Integrate[Csc[a + b*x]^2/Sin[2*a + 2*b*x]^(9/2),x]

[Out]

(480*EllipticF[a - Pi/4 + b*x, 2] + (-141*Csc[a + b*x]^2 - 32*Csc[a + b*x]^4 - 7*Csc[a + b*x]^6 + 11*Sec[a + b
*x]^2*(9 + Sec[a + b*x]^2))*Sqrt[Sin[2*(a + b*x)]])/(1232*b)

Maple [F(-1)]

Timed out.

\[\int \frac {\csc \left (x b +a \right )^{2}}{\sin \left (2 x b +2 a \right )^{\frac {9}{2}}}d x\]

[In]

int(csc(b*x+a)^2/sin(2*b*x+2*a)^(9/2),x)

[Out]

int(csc(b*x+a)^2/sin(2*b*x+2*a)^(9/2),x)

Fricas [C] (verification not implemented)

Result contains complex when optimal does not.

Time = 0.11 (sec) , antiderivative size = 235, normalized size of antiderivative = 2.22 \[ \int \frac {\csc ^2(a+b x)}{\sin ^{\frac {9}{2}}(2 a+2 b x)} \, dx=-\frac {240 \, \sqrt {2 i} {\left (\cos \left (b x + a\right )^{10} - 3 \, \cos \left (b x + a\right )^{8} + 3 \, \cos \left (b x + a\right )^{6} - \cos \left (b x + a\right )^{4}\right )} F(\arcsin \left (\cos \left (b x + a\right ) + i \, \sin \left (b x + a\right )\right )\,|\,-1) + 240 \, \sqrt {-2 i} {\left (\cos \left (b x + a\right )^{10} - 3 \, \cos \left (b x + a\right )^{8} + 3 \, \cos \left (b x + a\right )^{6} - \cos \left (b x + a\right )^{4}\right )} F(\arcsin \left (\cos \left (b x + a\right ) - i \, \sin \left (b x + a\right )\right )\,|\,-1) - \sqrt {2} {\left (240 \, \cos \left (b x + a\right )^{8} - 600 \, \cos \left (b x + a\right )^{6} + 444 \, \cos \left (b x + a\right )^{4} - 66 \, \cos \left (b x + a\right )^{2} - 11\right )} \sqrt {\cos \left (b x + a\right ) \sin \left (b x + a\right )}}{1232 \, {\left (b \cos \left (b x + a\right )^{10} - 3 \, b \cos \left (b x + a\right )^{8} + 3 \, b \cos \left (b x + a\right )^{6} - b \cos \left (b x + a\right )^{4}\right )}} \]

[In]

integrate(csc(b*x+a)^2/sin(2*b*x+2*a)^(9/2),x, algorithm="fricas")

[Out]

-1/1232*(240*sqrt(2*I)*(cos(b*x + a)^10 - 3*cos(b*x + a)^8 + 3*cos(b*x + a)^6 - cos(b*x + a)^4)*elliptic_f(arc
sin(cos(b*x + a) + I*sin(b*x + a)), -1) + 240*sqrt(-2*I)*(cos(b*x + a)^10 - 3*cos(b*x + a)^8 + 3*cos(b*x + a)^
6 - cos(b*x + a)^4)*elliptic_f(arcsin(cos(b*x + a) - I*sin(b*x + a)), -1) - sqrt(2)*(240*cos(b*x + a)^8 - 600*
cos(b*x + a)^6 + 444*cos(b*x + a)^4 - 66*cos(b*x + a)^2 - 11)*sqrt(cos(b*x + a)*sin(b*x + a)))/(b*cos(b*x + a)
^10 - 3*b*cos(b*x + a)^8 + 3*b*cos(b*x + a)^6 - b*cos(b*x + a)^4)

Sympy [F(-1)]

Timed out. \[ \int \frac {\csc ^2(a+b x)}{\sin ^{\frac {9}{2}}(2 a+2 b x)} \, dx=\text {Timed out} \]

[In]

integrate(csc(b*x+a)**2/sin(2*b*x+2*a)**(9/2),x)

[Out]

Timed out

Maxima [F]

\[ \int \frac {\csc ^2(a+b x)}{\sin ^{\frac {9}{2}}(2 a+2 b x)} \, dx=\int { \frac {\csc \left (b x + a\right )^{2}}{\sin \left (2 \, b x + 2 \, a\right )^{\frac {9}{2}}} \,d x } \]

[In]

integrate(csc(b*x+a)^2/sin(2*b*x+2*a)^(9/2),x, algorithm="maxima")

[Out]

integrate(csc(b*x + a)^2/sin(2*b*x + 2*a)^(9/2), x)

Giac [F]

\[ \int \frac {\csc ^2(a+b x)}{\sin ^{\frac {9}{2}}(2 a+2 b x)} \, dx=\int { \frac {\csc \left (b x + a\right )^{2}}{\sin \left (2 \, b x + 2 \, a\right )^{\frac {9}{2}}} \,d x } \]

[In]

integrate(csc(b*x+a)^2/sin(2*b*x+2*a)^(9/2),x, algorithm="giac")

[Out]

integrate(csc(b*x + a)^2/sin(2*b*x + 2*a)^(9/2), x)

Mupad [F(-1)]

Timed out. \[ \int \frac {\csc ^2(a+b x)}{\sin ^{\frac {9}{2}}(2 a+2 b x)} \, dx=\int \frac {1}{{\sin \left (a+b\,x\right )}^2\,{\sin \left (2\,a+2\,b\,x\right )}^{9/2}} \,d x \]

[In]

int(1/(sin(a + b*x)^2*sin(2*a + 2*b*x)^(9/2)),x)

[Out]

int(1/(sin(a + b*x)^2*sin(2*a + 2*b*x)^(9/2)), x)